
FOR EACH pt_mstr WHERE (pt_desc1 MATCHES("*" + CHR(2) + "*"))
    OR (pt_desc1 MATCHES("*" + CHR(10) + "*")) 
    OR (pt_desc1 MATCHES("*" + CHR(13) + "*"))
    OR (pt_desc2 MATCHES("*" + CHR(2) + "*"))
    OR (pt_desc2 MATCHES("*" + CHR(10) + "*"))
    OR (pt_desc2 MATCHES("*" + CHR(13) + "*")) :

                        
    /* DISP pt_part pt_desc1 pt_desc2 . */

    ASSIGN
        pt_desc1 = REPLACE(pt_desc1, CHR( 2), "")
        pt_desc1 = REPLACE(pt_desc1, CHR(10), "")
        pt_desc1 = REPLACE(pt_desc1, CHR(13), "")
        pt_desc2 = REPLACE(pt_desc2, CHR( 2), "")
        pt_desc2 = REPLACE(pt_desc2, CHR(10), "")
        pt_desc2 = REPLACE(pt_desc2, CHR(13), "")
        .

    DISP pt_part pt_desc1 pt_desc2 .
                        


END.
